object UserDlg: TUserDlg Left = 43 Top = 22 ActiveControl = Name_Ed BorderStyle = bsDialog Caption = 'User Account' ClientHeight = 376 ClientWidth = 388 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 Position = poScreenCenter OnCreate = FormCreate TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 273 Height = 361 end object Label1: TLabel Left = 16 Top = 16 Width = 37 Height = 13 Caption = 'Name:' end object Label2: TLabel Left = 16 Top = 60 Width = 48 Height = 13 Caption = 'User ID:' end object Label3: TLabel Left = 16 Top = 104 Width = 59 Height = 13 Caption = 'Password:' end object Label4: TLabel Left = 16 Top = 148 Width = 87 Height = 13 Caption = 'Data Directory:' end object OKBtn: TBitBtn Left = 300 Top = 8 Width = 77 Height = 27 Caption = '&OK' TabOrder = 0 OnClick = OKBtnClick Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 300 Top = 40 Width = 77 Height = 27 Caption = '&Cancel' TabOrder = 1 Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 300 Top = 72 Width = 77 Height = 27 TabOrder = 2 Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end object Name_Ed: TEdit Left = 16 Top = 33 Width = 257 Height = 20 MaxLength = 40 TabOrder = 3 end object UserID_Ed: TEdit Left = 16 Top = 77 Width = 129 Height = 20 MaxLength = 10 TabOrder = 4 end object Pass_Ed: TEdit Left = 16 Top = 121 Width = 129 Height = 20 MaxLength = 10 TabOrder = 5 end object DataDir_Ed: TEdit Left = 16 Top = 165 Width = 105 Height = 20 ReadOnly = True TabOrder = 6 end object Access_GB: TRadioGroup Left = 16 Top = 277 Width = 185 Height = 76 Caption = 'Public Files Access Rights' Items.Strings = ( 'Read and Write' 'Read Only' 'None') TabOrder = 7 end object Status_GB: TRadioGroup Left = 16 Top = 200 Width = 185 Height = 57 Caption = 'Current Status' Items.Strings = ( 'Active' 'Not Active') TabOrder = 8 end end